﻿''' <summary> 
''' 层内的详细信息 类 
''' </summary> 
''' <remarks></remarks> 
<Serializable()> Public Class ReconnaissanceTiterData
    Implements ICloneable


    ''' <summary> 
    ''' 层 (Integer) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_titer As Integer
    ''' <summary> 
    ''' 气压 (Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_pa As String
    ''' <summary> 
    ''' 离地高度 [m](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_distanceTerraHeight As String

    ''' <summary> 
    ''' 干球温度[C] (Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_dryTemperature As String
    ''' <summary> 
    ''' 露点温度 [C](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_dewPointTemperature As String
    ''' <summary> 
    ''' 风向(Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_windVane As String
    ''' <summary> 
    ''' 风速 [m/s](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_windSpeed As String

    ''' <summary> 
    ''' 风速切变 [(m/s)/10](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_windSpeedSwitch As String
    ''' <summary> 
    ''' 风向切变 [度/100m](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_windVaneSwitch As String
    ''' <summary> 
    ''' 温度梯度 [C/100m](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_temperatureLadder As String
    ''' <summary> 
    ''' 露点梯度 [C/100m](Double) 
    ''' </summary> 
    ''' <remarks></remarks> 
    Private m_dewPointLadder As String



    ''' <summary> 
    ''' 层 (Integer) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property Titer() As String
        Get
            Return Me.m_titer
        End Get
        Set(ByVal value As String)
            Me.m_titer = value
        End Set
    End Property

    ''' <summary> 
    ''' 气压 10 pa (Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property Pa() As String
        Get
            Return Me.m_pa
        End Get
        Set(ByVal value As String)
            Me.m_pa = value
        End Set
    End Property
    ''' <summary> 
    ''' 离地高度 [m](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property DistanceTerraHeight() As String
        Get
            Return Me.m_distanceTerraHeight
        End Get
        Set(ByVal value As String)
            Me.m_distanceTerraHeight = value
        End Set
    End Property
    ''' <summary> 
    ''' 干球温度[0.1 C] (Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property DryTemperature() As String
        Get
            Return Me.m_dryTemperature
        End Get
        Set(ByVal value As String)
            Me.m_dryTemperature = value
        End Set
    End Property
    ''' <summary> 
    ''' 露点温度 [0.1 C](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property DewPointTemperature() As String
        Get
            Return Me.m_dewPointTemperature
        End Get
        Set(ByVal value As String)
            Me.m_dewPointTemperature = value
        End Set
    End Property
    ''' <summary> 
    ''' 风向(Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property WindVane() As String
        Get
            Return Me.m_windVane
        End Get
        Set(ByVal value As String)
            Me.m_windVane = value
        End Set
    End Property
    ''' <summary> 
    ''' 风速 [0.1 m/s](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property WindSpeed() As String
        Get
            Return Me.m_windSpeed
        End Get
        Set(ByVal value As String)
            Me.m_windSpeed = value
        End Set
    End Property
















    ''' <summary> 
    ''' 风速切变 [(m/s)/10](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property WindSpeedSwitch() As Double
        Get
            Return Me.m_windSpeedSwitch
        End Get
        Set(ByVal value As Double)
            Me.m_windSpeedSwitch = value
        End Set
    End Property
    ''' <summary> 
    ''' 风向切变 [度/100m](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property WindVaneSwitch() As Double
        Get
            Return Me.m_windVaneSwitch
        End Get
        Set(ByVal value As Double)
            Me.m_windVaneSwitch = value
        End Set
    End Property
    ''' <summary> 
    ''' 温度梯度 [C/100m](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property TemperatureLadder() As Double
        Get
            Return Me.m_temperatureLadder
        End Get
        Set(ByVal value As Double)
            Me.m_temperatureLadder = value
        End Set
    End Property
    ''' <summary> 
    ''' 露点梯度 [C/100m](Double) 
    ''' </summary> 
    ''' <value></value> 
    ''' <returns></returns> 
    ''' <remarks></remarks> 
    Property DewPointLadder() As Double
        Get
            Return Me.m_dewPointLadder
        End Get
        Set(ByVal value As Double)
            Me.m_dewPointLadder = value
        End Set
    End Property

    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim objCopy As New ReconnaissanceTiterData
        objCopy.m_titer = Me.m_titer
        objCopy.m_pa = Me.m_pa
        objCopy.m_distanceTerraHeight = Me.m_distanceTerraHeight
        objCopy.m_dryTemperature = Me.m_dryTemperature
        objCopy.m_dewPointTemperature = Me.m_dewPointTemperature
        objCopy.m_windVane = Me.m_windVane
        objCopy.m_windSpeed = Me.m_windSpeed
        objCopy.m_windSpeedSwitch = Me.m_windSpeedSwitch
        objCopy.m_windVaneSwitch = Me.m_windVaneSwitch
        objCopy.m_temperatureLadder = Me.m_temperatureLadder
        objCopy.m_dewPointLadder = Me.m_dewPointLadder
        Return objCopy
    End Function
End Class
